Barcodes

Create 1D and 2D barcodes with R

2D Barcodes (QR)

qrcode

https://thierryo.github.io/qrcode/

install.packages("qrcode")

library(qrcode)
mp <- qr_code("derekmichaelwright.github.io/dblogr", ecl = "M")
mp <- add_logo(mp, "logo_dblogr.png", ecl = "L", hjust = "c", vjust = "c")
generate_svg(mp, "QR_dblogr.svg")
# Convert to png
rsvg::rsvg_png("QR_dblogr.svg", "QR_dblogr.png", width = 512, height = 512)

baRcodeR

https://docs.ropensci.org/baRcodeR/

install.packages("baRcodeR")

library(baRcodeR)

2D - QR Codes

myLabels <- paste0("Plot:", 1001:1160)
create_PDF(Labels = myLabels, name = "myLabes_QRCodes", type = "matrix")

myLabels_QRCodes.pdf

1D - Barcodes

myLabels <- paste0("Plot:", 1001:1160)
create_PDF(Labels = myLabels, name = "myLabels_BarCodes", type = "linear")

myLabels_BarCodes.pdf